home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Leonardo the Inventor
/
Leonardo The Inventor (93026)(Broderbund)(Riverdeep)(2004).iso
/
LEOWINMV
/
BIO.DIR
/
00235_Script_DoButtonBar - BIO
< prev
next >
Wrap
Text File
|
1996-04-01
|
1KB
|
40 lines
on doBioSecondButtonBar H, V
put 280 into ButtonBarHeight
put 28 into OneButtonHeight
put 168 into ButtonBarTop
put (V - ButtonBarTop) / OneButtonHeight into ButtonIndex
HiliteIndexChoice 0,ButtonIndex,1,10
if ButtonIndex = 0 then goBioPage 11
else if ButtonIndex = 1 then goBioPage 12
else if ButtonIndex = 2 then goBioPage 12
else if ButtonIndex = 3 then goBioPage 14
else if ButtonIndex = 4 then goBioPage 14
else if ButtonIndex = 5 then goBioPage 15
else if ButtonIndex = 6 then goBioPage 16
else if ButtonIndex = 7 then goBioPage 17
else if ButtonIndex = 8 then goBioPage 18
else if ButtonIndex = 9 then goBioPage 19
end doButtonBar
on doBioFirstButtonBar H, V
put 280 into ButtonBarHeight
put 28 into OneButtonHeight
put 168 into ButtonBarTop
put (V - ButtonBarTop) / OneButtonHeight into ButtonIndex
HiliteIndexChoice 0,ButtonIndex,1,10
if ButtonIndex = 0 then goBioPage 1
else if ButtonIndex = 1 then goBioPage 2
else if ButtonIndex = 2 then goBioPage 3
else if ButtonIndex = 3 then goBioPage 4
else if ButtonIndex = 4 then goBioPage 6
else if ButtonIndex = 5 then goBioPage 7
else if ButtonIndex = 6 then goBioPage 8
else if ButtonIndex = 7 then goBioPage 9
else if ButtonIndex = 8 then goBioPage 9
else if ButtonIndex = 9 then goBioPage 10
end doButtonBar